Actions Tools Form1 Command4 Text1 Text1 Command1 &Open Command3 &Print Command6 &Delete Command1_Click opendoc Command1_DragDrop Source Command3_Click printfile Command3_DragDrop command6_click DeleteFileQ Command6_DragDrop Command4_Click newfile Form_Load$ actions width Command6_KeyUp Keycode Shift PassKeys Command4_KeyUp Command3_KeyUp Command1_KeyUp newactions OpenDM ShiftDown SHIFT_MASK AltDown ALT_MASK CtrlDown CTRL_MASK SendString Command1_Click Command1_DragDrop Command3_Click Command3_DragDrop command6_click Command6_DragDrop Command4_Click Form_Load Command6_KeyUp Command4_KeyUp Command3_KeyUp Command1_KeyUp PassKeys If Shift_MASK > 0 And Keycode > 0 Then) If Shift = 1 Then SendKeys "+" + Chr$(Keycode)x If Shift = 2 Then SendKeys "^" + Chr$(Keycode)x If Shift = 4 Then SendKeys "%" + Chr$(Keycode)x End Iff